clear 
use "/Users/marclerchenmueller/Dropbox/BMJ_Gender_Promotion/BMJ_Dataverse/HDV_data/clinical_articles_90pct_genderdesig.dta" 

****Prevalence of individual positiev words
su i_amazing if pubtype == "Article" & i_positive 
su i_assuring if pubtype == "Article"& i_positive 
su i_astonishing if pubtype == "Article" & i_positive 
su i_bright if pubtype == "Article" & i_positive
su i_creative if pubtype == "Article" & i_positive
su i_encouraging if pubtype == "Article" & i_positive
su i_enormous if pubtype == "Article" & i_positive
su i_excellent if pubtype == "Article" & i_positive
su i_favorable if pubtype == "Article" & i_positive
su i_groundbreaking if pubtype == "Article" & i_positive 
su i_hopeful if pubtype == "Article" & i_positive
su i_innovative if pubtype == "Article" & i_positive
su i_inspiring if pubtype == "Article" & i_positive
su i_inventive if pubtype == "Article" & i_positive
su i_novel if pubtype == "Article" & i_positive
su i_phenomenal if pubtype == "Article" & i_positive
su i_prominent if pubtype == "Article" & i_positive
su i_promising if pubtype == "Article" & i_positive
su i_reassuring if pubtype == "Article" & i_positive
su i_remarkable if pubtype == "Article" & i_positive
su i_robust if pubtype == "Article" & i_positive
su i_spectacular if pubtype == "Article" & i_positive
su i_supportive if pubtype == "Article" & i_positive
su i_unique if pubtype == "Article" & i_positive
su i_unprecedented if pubtype == "Article" & i_positive

**** Linear probability models of individual positive word use

reg i_amazing i.l_female if i_clinical == 1 & pubtype == "Article" 
margins i.l_female 

reg i_assuring i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_astonishing i.l_female if i_clinical == 1 & pubtype == "Article" 
margins i.l_female 

reg i_bright i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_creative i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_encouraging i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_enormous i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_excellent i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_favorable i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_groundbreaking i.l_female if i_clinical == 1 & pubtype == "Article" 
margins i.l_female 

reg i_hopeful i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_innovative i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_inspiring i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_inventive i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_novel i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_phenomenal i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_prominent i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_promising i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_reassuring i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_remarkable i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_robust i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_spectacular i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_supportive i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_unique i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 

reg i_unprecedented i.l_female if i_clinical == 1 & pubtype == "Article"
margins i.l_female 
